
font_file <- "lmroman10-regular-webfont.ttf"
font_add("lmodern", regular = font_file)
showtext_auto()

plot_colors <- c("#1f77b4", "#ff7f0e", "#2ca02c", "#d62728", "#9467bd", "#8c564b", "#e377c2", "#7f7f7f", "#bcbd22", "#17becf")

# Set the theme
theme_set(
  theme_light() +
    theme(
      text = element_text(family = "lmodern", size = 14), # Increase font size
      plot.title = element_text(family = "lmodern", face = "bold", size = 14), # Increase font size
      axis.title = element_text(family = "lmodern", face = "bold", size = 14), # Increase font size
      axis.text = element_text(family = "lmodern", size = 10), # Increase font size
      legend.title = element_blank(),
      legend.text = element_text(family = "lmodern", size = 10), # Increase font size
      legend.position = "top",
      panel.grid.major = element_blank(),
      panel.grid.minor = element_blank(),
      plot.background = element_rect(fill = "white")
    )
)

